﻿Namespace QuanLyKhachHang
    Public Class DonHangBLL
        Public Function DonHangBan_GetItems(ByVal TrangThai As String, ByVal TuNgay As Integer, ByVal DenNgay As Integer) As List(Of DonHang)
            Try
                Dim doit As New DonHangDAL
                Return doit.DonHangBan_GetItems(TrangThai, TuNgay, DenNgay)
            Catch ex As Exception
                Throw ex
            End Try
        End Function
        Public Function DonHangBan_GetItems_TenKhachHang(ByVal TrangThai As String, ByVal TenKhacHang As String) As List(Of DonHang)
            Try
                Dim doit As New DonHangDAL
                Return doit.DonHangBan_GetItems_TenKhachHang(TrangThai, TenKhacHang)
            Catch ex As Exception
                Throw ex
            End Try
        End Function
        Public Function DonHangBan_GetItems_SoHoaDon(ByVal TrangThai As String, ByVal SoHoaDon As String) As List(Of DonHang)
            Try
                Dim doit As New DonHangDAL
                Return doit.DonHangBan_GetItems_SoHoaDon(TrangThai, SoHoaDon)
            Catch ex As Exception
                Throw ex
            End Try
        End Function
    End Class
End Namespace
